10 POKE646,5:POKE53280,5:POKE53281,0
20 PRINT"[147][176][192][192]       [176][201]        [221]     COPYRIGHT 1989";
30 PRINT"[171][192][192][213][192][201][213][192][201] [171][177][201][213][192][201][213][192][174][192][219][192][213][192][201][171][192][201] COMPUTE!'S ";
40 PRINT"[221]  [221] [221][221] [221] [221] [221][171][192][189][221] [221] [221] [171][192][189][221]    GAZETTE   ";
50 PRINT"[173][192][192][202][192][179][202][192][179] [173][192][203][202][192][203][202][192][177] [203] [202][192][203][221]              ";
60 PRINT"   [202][192][203][202][192][203]   SCORE         LIVES         ";
70 PRINT"                                        "
80 POKE646,6:FORN=1TO4:PRINT:PRINT
90 PRINT"    [192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]   ":PRINT
100 NEXT:POKE646,5:GOSUB1000:(null):B=0
110 FORN=0TO3:BL(N)=176+2*N:NEXT
120 POKE724,0:POKE725,0:POKE716,5:TM$="000005":TI$="000000"
130 S=256*PEEK(725)+PEEK(724):L=PEEK(716):(null)7,BL(B),2,20
140 PRINT"   [202][192][203][202][192][203]   SCORE         LIVES         [145]";
150 PRINTTAB(17);S;TAB(31);L
160 IFL<1ORL>5THEN220
170 IFL<>PEEK(716)THEN130
180 IFS<>(256*PEEK(725)+PEEK(724))THEN130
190 IFTI$<TM$THEN160
200 TI$="000000":B=B+1:IFB>3THENB=0
210 GOTO130
220 (null):GOSUB1000:PRINT" PLAY AGAIN? [Y/N]"
230 GETK$:IFK$="Y"THENRUN
240 IFK$><"N"THEN230
250 PRINT"[147]":END
1000 RESTORE
1010 READN:IFN<0THENRETURN
1020 (null)6,N:FORT=1TO80:NEXT:GOTO1010
1030 DATA55,57,58,58,57,57,58,64,66,58,58,58
1040 DATA-1